home *** CD-ROM | disk | FTP | other *** search
/ SGI Hot Mix 14 / Hot Mix 14.iso / HTML / vendors / finesse / examples / sh / software < prev    next >
Text File  |  1996-06-27  |  2KB  |  120 lines
  1. #! /bin/sh
  2. # FINESSEAPPLICATIONKEY sEdDPeUptwYqV
  3. # 
  4. # Skeleton for Script "scsoftware" that puts 
  5. # together a software distribution from data 
  6. # of a Finesse window. Data checking and 
  7. # processing is only indicated.
  8.  
  9. . ${FINESSEPATH-/usr/local/finesse}/fsshinit
  10.  
  11. # Define window and open server
  12. # -----------------------------
  13.  
  14. define_window ()
  15. {
  16.   deutsch=German
  17.   englisch=English
  18.   title="Software Distribution"
  19.   sware="Software:"
  20.   tlimit="Time limit (Months):"
  21.   language=Language:
  22.   htype="Host Type:"
  23.   nrtoday="Series Number:"
  24.   error=Error
  25.   qic="QIC150"
  26.   floppy="Floppy"
  27.   exa=Exabyte
  28.  
  29.   windef="
  30.   FsWindow      -name winname
  31.                 -title '$title'
  32.                 -btype oxa ;
  33.   FsSeparator ;
  34.   FsText        -label Customer 
  35.                 -var customer ;
  36.   FsText        -label '$sware'
  37.                 -var software=PolyScan ;
  38.   FsText        -label '$tlimit'
  39.                 -var nmonths=2;
  40.   FsText        -label '$nrtoday'
  41.                 -var nrheute=1435a34;
  42.   FsSeparator ;
  43.   FsOptionMenu  -label '$htype'
  44.                 -var machine=sun4 
  45.                 -items 'iris4d sun4 rs6000 hp9000s700';
  46.   FsOptionMenu  -label Medium:
  47.                 -var medium=$qic
  48.                 -items '$qic $exa $floppy';
  49.   FsOptionMenu  -label $language
  50.                 -var sprache=$englisch
  51.                 -items '$deutsch $englisch';
  52.   FsSeparator ;"
  53.  
  54. Fsopen "$@"
  55. }
  56.  
  57. # Window dialog:
  58. # Display window, check values, 
  59. # redisplay window on error
  60. # -----------------------------
  61.  
  62. display_window ()
  63. {
  64.  
  65. Fsdisplay -m "$title" -w "$windef"
  66. if [ "$fsbutton" != "o" ] ; then
  67.   Fsclose; exit
  68. else
  69.   while :
  70.   do
  71.     check_vars
  72.     if [ $? -eq 0 ] ; then 
  73.       break 
  74.     else 
  75.       Fsdisplay -n winname -m "$errormessage" 
  76.       if [ "$fsbutton" != "o" ] ; then
  77.         exit
  78.       fi
  79.     fi 
  80.   done
  81. fi ;
  82. }
  83.  
  84.  
  85. check_vars ()
  86. {
  87. # just check time limit, default if not set
  88. # 
  89.  
  90. if [ \( ${nmonths:=2} -lt 2 \) -o \
  91.      \( ${nmonths:=2} -gt 12 \) ] ; then
  92.   errormessage="$error: $tlimit" 
  93.   return 1
  94. fi
  95.  
  96. return 0 ;
  97. }
  98.  
  99. # Process data 
  100. # ------------
  101.  
  102. process_data ()
  103. {
  104. Fssave
  105. Fsecho "OK. Processing. Please wait..."
  106. sleep 3      # Just pretend to do so
  107. Fsecho Done.
  108. sleep 1
  109. Fsclose
  110. exit 0
  111. }
  112.  
  113. # main script
  114. # -----------
  115.  
  116. define_window "$@"
  117. display_window
  118. process_data
  119.  
  120.